home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / smaltalk / stv.lha / STV / st_v / util / STVUTIL4.ZIP / NWSPRC.VP < prev    next >
Text File  |  1993-02-07  |  1KB  |  29 lines
  1. "****************************************
  2. Project: \Projects\ARSystem\NewSuperclass
  3. Created: Nov  8, 1992, 06:10:26
  4. Compatibility: The Smalltalk Project Browser, version 1.1
  5. ****************************************"
  6.  
  7. (Smalltalk includesKey: #EmpProjectBrowser)
  8.     ifFalse: [^self error: 'Project Browser not installed'].!
  9.  
  10. Smalltalk at: #EmpObjectFilingIn put: (EmpProjectEntry new
  11.     projectName: '\Projects\ARSystem\NewSuperclass';
  12.     pathName: 'A:\NWSPRCLS.vp')!
  13. EmpObjectFilingIn addClassEntry: (EmpProjectClassEntry new
  14.     className: #Class;
  15.     instanceMethods: #(fileOutWithSubclasses newSuperclass: prune removeSubclasses) asSortedCollection)!
  16. EmpObjectFilingIn addClassEntry: (EmpProjectClassEntry new
  17.     className: #IndexedCollection;
  18.     instanceMethods: #(scan:replace: scan:replace:noMatch:) asSortedCollection)!
  19. EmpObjectFilingIn addClassEntry: (EmpProjectClassEntry new
  20.     className: #Stream;
  21.     instanceMethods: #(fileInNoReset) asSortedCollection)!
  22. EmpObjectFilingIn addClassEntry: (EmpProjectClassEntry new
  23.     className: #ClassHierarchyBrowser;
  24.     instanceMethods: #(selectedClass:) asSortedCollection)!
  25. EmpObjectFilingIn addListElement!
  26. Smalltalk removeKey: #EmpObjectFilingIn!
  27.  
  28.  
  29.